home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / oper_sys / kerberos / pc / krb_libd.lha / Lib / Des / FP.C < prev    next >
Encoding:
Text File  |  1991-08-08  |  2.8 KB  |  76 lines
  1. /* This file is automatically generated.  Do not edit it. */
  2.     L2 = 0; R2 = 0;
  3. /* FP operations */
  4. /* first left to left */
  5.     if (L1 & (1UL<< 7))  L2 |= 1UL<< 6;
  6.     if (L1 & (1UL<<15))  L2 |= 1UL<< 4;
  7.     if (L1 & (1UL<<23))  L2 |= 1UL<< 2;
  8.     if (L1 & (1UL<<31))  L2 |= 1UL<< 0;
  9.     if (L1 & (1UL<< 6))  L2 |= 1UL<<14;
  10.     if (L1 & (1UL<<14))  L2 |= 1UL<<12;
  11.     if (L1 & (1UL<<22))  L2 |= 1UL<<10;
  12.     if (L1 & (1UL<<30))  L2 |= 1UL<< 8;
  13.     if (L1 & (1UL<< 5))  L2 |= 1UL<<22;
  14.     if (L1 & (1UL<<13))  L2 |= 1UL<<20;
  15.     if (L1 & (1UL<<21))  L2 |= 1UL<<18;
  16.     if (L1 & (1UL<<29))  L2 |= 1UL<<16;
  17.     if (L1 & (1UL<< 4))  L2 |= 1UL<<30;
  18.     if (L1 & (1UL<<12))  L2 |= 1UL<<28;
  19.     if (L1 & (1UL<<20))  L2 |= 1UL<<26;
  20.     if (L1 & (1UL<<28))  L2 |= 1UL<<24;
  21.  
  22.  
  23. /* now from right to left */
  24.     if (R1 & (1UL<< 7))  L2 |= 1UL<< 7;
  25.     if (R1 & (1UL<<15))  L2 |= 1UL<< 5;
  26.     if (R1 & (1UL<<23))  L2 |= 1UL<< 3;
  27.     if (R1 & (1UL<<31))  L2 |= 1UL<< 1;
  28.     if (R1 & (1UL<< 6))  L2 |= 1UL<<15;
  29.     if (R1 & (1UL<<14))  L2 |= 1UL<<13;
  30.     if (R1 & (1UL<<22))  L2 |= 1UL<<11;
  31.     if (R1 & (1UL<<30))  L2 |= 1UL<< 9;
  32.     if (R1 & (1UL<< 5))  L2 |= 1UL<<23;
  33.     if (R1 & (1UL<<13))  L2 |= 1UL<<21;
  34.     if (R1 & (1UL<<21))  L2 |= 1UL<<19;
  35.     if (R1 & (1UL<<29))  L2 |= 1UL<<17;
  36.     if (R1 & (1UL<< 4))  L2 |= 1UL<<31;
  37.     if (R1 & (1UL<<12))  L2 |= 1UL<<29;
  38.     if (R1 & (1UL<<20))  L2 |= 1UL<<27;
  39.     if (R1 & (1UL<<28))  L2 |= 1UL<<25;
  40.  
  41. /* now from left to right */
  42.     if (L1 & (1UL<< 3))  R2 |= 1UL<< 6;
  43.     if (L1 & (1UL<<11))  R2 |= 1UL<< 4;
  44.     if (L1 & (1UL<<19))  R2 |= 1UL<< 2;
  45.     if (L1 & (1UL<<27))  R2 |= 1UL<< 0;
  46.     if (L1 & (1UL<< 2))  R2 |= 1UL<<14;
  47.     if (L1 & (1UL<<10))  R2 |= 1UL<<12;
  48.     if (L1 & (1UL<<18))  R2 |= 1UL<<10;
  49.     if (L1 & (1UL<<26))  R2 |= 1UL<< 8;
  50.     if (L1 & (1UL<< 1))  R2 |= 1UL<<22;
  51.     if (L1 & (1UL<< 9))  R2 |= 1UL<<20;
  52.     if (L1 & (1UL<<17))  R2 |= 1UL<<18;
  53.     if (L1 & (1UL<<25))  R2 |= 1UL<<16;
  54.     if (L1 & (1UL<< 0))  R2 |= 1UL<<30;
  55.     if (L1 & (1UL<< 8))  R2 |= 1UL<<28;
  56.     if (L1 & (1UL<<16))  R2 |= 1UL<<26;
  57.     if (L1 & (1UL<<24))  R2 |= 1UL<<24;
  58.  
  59. /* last from right to right */
  60.     if (R1 & (1UL<< 3))  R2 |= 1UL<< 7;
  61.     if (R1 & (1UL<<11))  R2 |= 1UL<< 5;
  62.     if (R1 & (1UL<<19))  R2 |= 1UL<< 3;
  63.     if (R1 & (1UL<<27))  R2 |= 1UL<< 1;
  64.     if (R1 & (1UL<< 2))  R2 |= 1UL<<15;
  65.     if (R1 & (1UL<<10))  R2 |= 1UL<<13;
  66.     if (R1 & (1UL<<18))  R2 |= 1UL<<11;
  67.     if (R1 & (1UL<<26))  R2 |= 1UL<< 9;
  68.     if (R1 & (1UL<< 1))  R2 |= 1UL<<23;
  69.     if (R1 & (1UL<< 9))  R2 |= 1UL<<21;
  70.     if (R1 & (1UL<<17))  R2 |= 1UL<<19;
  71.     if (R1 & (1UL<<25))  R2 |= 1UL<<17;
  72.     if (R1 & (1UL<< 0))  R2 |= 1UL<<31;
  73.     if (R1 & (1UL<< 8))  R2 |= 1UL<<29;
  74.     if (R1 & (1UL<<16))  R2 |= 1UL<<27;
  75.     if (R1 & (1UL<<24))  R2 |= 1UL<<25;
  76.